home *** CD-ROM | disk | FTP | other *** search
/ Workbench Designer 2 / Workbench Designer 2.iso / time / waituntil / .waituntil next >
Encoding:
AmigaDOS Script File  |  1997-07-31  |  504 b   |  21 lines
  1. .key time/A
  2. .ket }
  3. .bra {
  4.  
  5. wait until {time}
  6. oplay -r8000 "s:Let's Go!.Lemmings"
  7. reqask CENTER TITLE "              Let's Go!" BODY " _        _   _               _*n| |   ___| |_( )___  __ _ ___| |*n| |__/ -_)  _|/(_-< / _` / _ \_|*n|____\___|\__| /__/ \__, \___(_)*n                    |___/" GADGET "Go!"
  8.  
  9. grep -v {time} s:.waits >ram:.waits
  10.  
  11. setenv LEN `wc -l ram:.waits | head -1 | cut -f6-7 "-d "`
  12.  
  13. if $LEN eq 0
  14.   delete s:.waits
  15. else
  16.   copy ram:.waits s:
  17.   delete ram:.waits
  18. endif
  19.  
  20. delete env:LEN
  21.